Top 10k strings from Weeny Drumkit, The (1990)(ACP)(128k).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [Z80] (TOSEC-v2007-01-01) /

Back to the directory listing

   2  (X/256)*256)
   1 TIME FREE : ";10000
   1 ;"Hit a weeny key to save to tape":
   1 ;"Hit a key for the terminal":
   1 : OUT REG,13: OUT NUM,2: RE
   1 9 REM  SET CHANNEL A PITCH 
   1 60 OUT REG,11: OUT NUM,X-( INT
   1 6 LET NUM=49149
   1 50 LET X=3000
   1 5 LET REG=65533
   1 49 REM  SET ENVELOPE LENGTH 
   1 40 OUT REG,7: OUT NUM,255-8
   1 4 REM  THE REGISTER NUMBERS 
   1 39 REM  TURN CHAN A NOISE ON 
   1 30 OUT REG,8: OUT NUM,15+16
   1 3 OUT REG,6: OUT NUM, CODE D$
   1 29 REM  SET CHANNEL A VOLUME 
   1 243)+(9999 AND PEEK 65507=2
   1 20 OUT REG,1: OUT NUM,20
   1 2 REM  DRUM PLAY SUB-ROUTINE 
   1 10 OUT REG,0: OUT NUM,20
   1 1 GO TO (5 AND PEEK 65507 <> 
   1 '"TIME RECORDED : ";MAX;"
   1 '"1 : PLAY THE DRUMS"''"2 : 
   1 "WEENY.DEM"
   1 "''"Programmed by Antony Purvis -   Mailbox 703630221"''"Feel free to mailbox with
   1  ready. Play Now!":
   1  comments and suggestions on thisprogram."''''"
   1  YOURSELF"''"3 : 
   1  TURN CHAN A NOISE ON 
   1  THE WEENY DRUMKIT   
   1  THE WEENY DRUMKIT
   1  THE REGISTER NUMBERS 
   1  Sym-shift A to stop"
   1  SETUP VARIABLES 
   1  SET ENVELOPE SHAPE 
   1  SET ENVELOPE LENGTH 
   1  SET CHANNEL A VOLUME 
   1  SET CHANNEL A PITCH 
   1  REPLAY DRUMBEATS 
   1  RECORDING 
   1  RECORD DRUMBEATS 
   1  OPTIONS: 
   1  MAIN MENU 
   1  Hit any Keys! Press  Symbol-Shift and A to finish.":
   1  FREEPLAY 
   1  FREE PLAY 
   1  DRUM PLAY SUB-ROUTINE 
   1  BACK"''"4 : QUIT"
   1  1990 ANTONY PURVIS (BIG NOISE)"
   1  1990 ACP